home *** CD-ROM | disk | FTP | other *** search
/ Video Toaster 4.3 / Video Toaster v4.3.iso / 3.1 / toasterall / arexx_examples / tpaint / tpcommand.rexx < prev    next >
OS/2 REXX Batch file  |  1993-05-13  |  272b  |  14 lines

  1. /* TPCommand.rexx -- Execute TP command */
  2. /* © 1993 NewTek, Inc.    by Arnie Cachelin */
  3.  
  4.  
  5. parse arg cmd
  6. if pos('DigiPaint',show(ports))=0 then do
  7.   say "Can't find ToasterPaint!"
  8.   exit
  9. end
  10.  
  11. Address "DigiPaint"     /* Tell ARexx where commands go  */
  12. interpret cmd
  13. exit
  14.